%% Movie Test

%% Init

x=0:.1:2*pi;

for i=1:100
    fig=plot(x,sin(x+i/10));
    %set(fig)
    M(i)=getframe;
end

%movie(M);

movie2avi(M,'mov1','Compression','none');